home *** CD-ROM | disk | FTP | other *** search
- // -----
- // VDL172.txt
- // Copyright 1996 Claris
- // -----
-
-
-
- //Frame Wizard
- /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
- /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
- /************************** LOCALIZED STRING CONSTANTS BEGIN **************************************/
-
- //This section contains all localizable string constants for this VDL program. Be sure to
- //include the backslash character at the end of each line of a multi-line string, except for the last line.
- //You may also flatten multiline constants into a single line, if you prefer
-
- #define kLit1 "Select files for inclusion in the new Frame Document:"
- #define kLit2 "Add &File..."
- #define kLit3 "&Document Orientation:"
- #define kLit4 "Horizontal "
- #define kLit5 "Vertical"
-
- //Note: the file name will probably not change, but the name of the "Help" folder
- //probably will. Note that the translated name MUST be 8 chars or less.
- #define kHelpURL "Help/FrameWiz.htm"
- #define kHelpTitle "&Help"
-
- /************************** LOCALIZED STRING CONSTANTS END **************************************/
- /************************** LOCALIZED STRING CONSTANTS END **************************************/
- /************************** LOCALIZED STRING CONSTANTS END **************************************/
-
-
-
- /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
- /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
- /************************** LOCALIZED NUMERICAL CONSTANTS BEGIN **************************************/
-
- //This section contains integer constants that are used to format this VDL program.
- //These are localizable - they only need to be changed if the localized strings
- //are sufficiently longer than the US strings. Localize the strings first, then the constants.
-
- #define kFilesListWidth 450
- #define kFilesListHeight 200
-
- //Width of the "Add File" button and, on Windows, the "Help" button.
- #define kAddFileButtonWidth 100
-
- /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
- /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
- /************************** LOCALIZED NUMERICAL CONSTANTS END **************************************/
-
- //No further localizable data past this point
-
- /************************** END LOCALIZABLE DATA ***************************************************/
- /************************** END LOCALIZABLE DATA ***************************************************/
- /************************** END LOCALIZABLE DATA ***************************************************/
-
- #if Platform_Mac
- #define DlogBack BackColor = {65535, 65535, 65535}
- #else
- #define DlogBack BackColor = Dialog
- #endif
-
-
-
- Margin(5,5,5,5, DlogBack)
- VList()
- {
- StaticText(kLit1);
- Spacer(Height = 10, Width = 0);
-
- #if Platform_Win
- Margin(0,0,1,0, BackColor = Black)
- VList(Height = kFilesListHeight, Width = kFilesListWidth, VScroll)
- Margin(10, 5, 0, 0, BackColor = White)
- GenericView("FrameWizardFileList");
- #else
- VList(Height = kFilesListHeight, Width = kFilesListWidth, VScroll)
- Margin(10, 5, 0, 0, BackColor = White)
- GenericView("FrameWizardFileList");
- #endif
-
- Spacer(Height = 10, Width = 0);
-
- HList(Width = UseParent)
- {
- CancelButton(kLit2, 0, "AddFileToFrameWizardList", Width = kAddFileButtonWidth);
- Spacer(Height = 0, Width = UseParent);
- IntegerPopup( kLit3, Default, FrameOrientation)
- {
- IntItem(kLit4, 0);
- IntItem(kLit5, 1);
- };
- }
-
- Spacer(Height = 10, Width = 0);
-
- HList(Width = UseParent)
- {
- #if Platform_Mac
- Spacer(Height = 0, Width = 5);
- PictPushButton(4000, "ContextHelpProc", HelpFile = kHelpURL)
- {
- Enabled(Draw, 'cicn',14055 );
- Disabled(Draw, 'cicn',14057 );
- Tracking(Draw, 'cicn',14056 );
- };
- #else
- PushButton(kHelpTitle, 4000, "ContextHelpProc", HelpFile = kHelpURL, Width = kAddFileButtonWidth);
- #endif
-
- StandardDialogButtonsH;
- }
-
- } // VList
-
-